home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
C/C++ Users Group Library 1996 July
/
C-C++ Users Group Library July 1996.iso
/
listings
/
v_07_04
/
v7n4109a.txt
< prev
Wrap
Text File
|
1989-03-01
|
4KB
|
189 lines
Listing 1
create database task;
database created.
create table tasks
(
item_nosmallint,
description char(56),
due_date date,
start_date date,
hours smallint,
status char(8),
who char(10)
);
table created.
create unique index taskind on tasks (item_no);
index created.
delete from tasks;
1 row(s) deleted.
insert into tasks
(item_no,description,due_date,start_date,hours,status,who)
values
(1,"baseline","01/01/90","01/01/89",1000,"on time","all");
1 row(s) inserted.
select * from tasks;
item_no 1
description baseline
due_date 01/01/1990
start_date 01/01/1989
hours 1000
status on time
who all
1 row(s) retrieved.
insert into tasks
(item_no,description,due_date,start_date,hours,status,who)
values
(2,"cleanup","12/31/89","12/01/89",100,"scheduled","all");
1 row(s) inserted.
select * from tasks;
item_no 1
description baseline
due_date 01/01/1990
start_date 01/01/1989
hours 1000
status on time
who all
item_no 2
description cleanup
due_date 12/31/1989
start_date 12/01/1989
hours 100
status schedule
who all
2 row(s) retrieved.
update tasks set status = <169>late<170> where item_no = 1;
1 row(s) updated.
select * from tasks;
item_no 1
description baseline
due_date 01/01/1990
start_date 01/01/1989
hours 1000
status late
who all
item_no 2
description cleanup
due_date 12/31/1989
start_date 12/01/1989
hours 100
status schedule
who all
2 row(s) retrieved.
delete from tasks where item_no = 2;
1 row(s) deleted.
select * from tasks;
item_no 1
description baseline
due_date 01/01/1990
start_date 01/01/1989
hours 1000
status late
who all
1 row(s) retrieved.
Listing 2
struct sqlca_s
{
long sqlcode; /* error message number */
char sqlerrm[72]; /* error message info */
char sqlerrp[8];
long sqlerrd[6];
/* 0 - reserved */
/* 1 - serial value after insert */
/* 2 - number of rows processed */
/* 3 - reserved */
/* 4 - offset into string with error */
/* 5 - rowid after insert */
struct sqlcaw_s
{
char sqlwarn0; /* = W if any sqlwarn[1-7] = W */
char sqlwarn1; /* = W on truncation occurred */
char sqlwarn2; /* = W for null value returned */
char sqlwarn3; /* = W if select list != into list */
char sqlwarn4; /* = W if no where clause */
char sqlwarn5; /* reserved */
char sqlwarn6; /* reserved */
char sqlwarn7; /* reserved */
};
struct sqlcaw_s sqlwarn;
};
extern struct sqlca_s sqlca;
#include <stdio.h>
$include sqlca;
$include sqlda;
$char *ptr;
$char *who;
$char itemno[8];
$char status[12];
main(argc, argv)
int argc;
char *argv[];
{
ptr = "select status, item_no from customer where who matches ?";
who = argv[1];
$database task;
if (!sqlca.sqlcode)
$prepare s_name from $ptr;
if (!sqlca.sqlcode)
$declare kursor cursor for s_name;
if (!sqlca.sqlcode)
$open kursor using $who;
if (!sqlca.sqlcode)
{
for ( ; ; )
{
$fetch kursor into $status, $itemno;
if (sqlca.sqlcode)
break;
printf("%s %s\n", status, itemno);
}
$close kursor;
}
else
printf("ESQL command error %ld\n", sqlca.sqlcode);
}